home *** CD-ROM | disk | FTP | other *** search
/ ftp2.jacobs.com / 2015.02.ftp2.jacobs.com.tar / ftp2.jacobs.com / pub / iPass / Open Mobile-V2.3.0-11624-V9.000.msi / Data1.cab / _8B628F6D1E29B37E30F76B82E100C0E0 < prev    next >
Text File  |  2012-10-24  |  799b  |  41 lines
  1. ; iPass Dial-Up Networking Script
  2. ;
  3. ; Copyright (C) 1997-2000 iPass Inc.
  4. ;
  5. ; Do not edit this script.  Connection to the
  6. ; remote access points requires this script.
  7. ;
  8. ; Future auto-updates of this script will not
  9. ; occur when editions are made to this script.
  10. ;
  11. proc main
  12.     integer count = 0
  13.     transmit "^M"
  14.     delay 1
  15.     transmit "^M"
  16.     delay 1
  17.     transmit "^M"
  18.     delay 1
  19.     while count < 5 do
  20.      waitfor "in:" until 2
  21.         if $SUCCESS then
  22.         goto DoLogin
  23.         endif
  24.         count = count + 1
  25.     endwhile
  26.     halt
  27. DoLogin:
  28. ;    delay 1
  29.     transmit $USERID, raw
  30.     transmit "^M"
  31.     waitfor "word: " until 2
  32.     transmit $PASSWORD, raw
  33.     transmit "^M"
  34.     waitfor "ppp" until 10
  35.      if $FAILURE then
  36.      goto Fail
  37.      endif
  38. Fail:
  39. endproc
  40.  
  41.